home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Computer Life 1997 February
/
Computer Life February 1997.iso
/
TELME
/
COMMS
/
TMGATE.SRP
< prev
next >
Wrap
Text File
|
1996-06-04
|
2KB
|
101 lines
rem Copyright (c) PhoneLink plc
rem SCII - ISDN (24.5.95)
label InitDevice
echo off
label OffToGate
rem ISDN Offline to Gate (also contains Pad to Gate)
echo off
echo Making call...
EstablishIsdnCall "{PreTel}{SiteTel}{PostFix}"
timeout 10,connect_fail
finderr 0,BUSY,busy
finderr 103,NO DIALTONE,connect_fail
finderr 0,NO CARRIER,no_carrier
finderr 0,OFFLINE,no_carrier
find "CONNECT"
label PadToGate
echo off
MakeCall "{NUA}"
timeout 3,nua_bad1
finderr 0,COM,nua_good
find "ZZZ"
label nua_bad1
MakeCall "{NUA}"
timeout 3,nua_bad2
finderr 0,COM,nua_good
find "ZZZ"
label nua_bad2
MakeCall "{NUA}"
timeout 3,nua_fail
finderr 0,CLR,cleared
find "COM"
label nua_good
echo Call connected.
end
label GateToPad
echo off
ClearCall
timeout 10,clear_fail
finderr 0,OFFLINE,no_carrier
find "CLR"
echo Waiting on line...
end
label GateToOff
rem Gate to Offline (also contains Pad to Offline)
echo off
ClearCall
timeout 10,clear_fail
finderr 0,OFFLINE,no_carrier
find "CLR"
label PadToOff
echo off
BreakIsdnCall
timeout 5,offline_fail
find "OFFLINE"
echo Offline.
end
label modem_offline
ClearCall
timeout 5,command_mode
finderr 0,OFFLINE,no_carrier
find "CLR"
label command_mode
BreakIsdnCall
timeout 5,hang_up
find "OFFLINE"
label hang_up
abort
label connect_fail
echo script[1]
goto command_mode
label busy
echo script[2]
goto command_mode
label no_carrier
echo script[3]
goto command_mode
label nua_fail
echo script[22]
goto command_mode
label cleared
echo script[21]
goto command_mode
label clear_fail
echo script[13]
goto modem_offline
label offline_fail
echo script[18]
goto command_mode